home *** CD-ROM | disk | FTP | other *** search
- on openIndexWindow
- global gIndexWindow, PackageType
- vWidth = 592
- vHeight = 360
- tell the stage
- vPosH = the stageLeft + (((the stageRight - the stageLeft) / 2) - (vWidth / 2))
- end tell
- tell the stage
- vPosV = the stageTop + (((the stageBottom - the stageTop) / 2) - (vHeight / 2))
- end tell
- gIndexWindow = window("Index Search")
- gIndexWindow.fileName = the pathname & "cont-indexer"
- gIndexWindow.windowType = 16
- gIndexWindow.rect = rect(vPosH, vPosV, vPosH + vWidth, vPosV + vHeight)
- open(gIndexWindow)
- moveToFront(gIndexWindow)
- end
-
- on openCDlistWindow
- global gCDListWindow, PackageType
- vWidth = 240
- vHeight = 280
- tell the stage
- vPosH = the stageLeft + (((the stageRight - the stageLeft) / 2) - (vWidth / 2))
- end tell
- tell the stage
- vPosV = the stageTop + (((the stageBottom - the stageTop) / 2) - (vHeight / 2))
- end tell
- gCDListWindow = window("CD List")
- gCDListWindow.fileName = the pathname & "cont-cdlister"
- gCDListWindow.windowType = 16
- gCDListWindow.rect = rect(vPosH, vPosV, vPosH + vWidth, vPosV + vHeight)
- open(gCDListWindow)
- moveToFront(gCDListWindow)
- end
-
- on openGlossaryWindow
- global gGlossaryWindow, PackageType
- vWidth = 592
- vHeight = 360
- tell the stage
- vPosH = the stageLeft + (((the stageRight - the stageLeft) / 2) - (vWidth / 2))
- end tell
- tell the stage
- vPosV = the stageTop + (((the stageBottom - the stageTop) / 2) - (vHeight / 2))
- end tell
- gGlossaryWindow = window("Glossary Search")
- gGlossaryWindow.fileName = the pathname & "cont-glossary"
- gGlossaryWindow.windowType = 16
- gGlossaryWindow.rect = rect(vPosH, vPosV, vPosH + vWidth, vPosV + vHeight)
- open(gGlossaryWindow)
- end
-
- on openQuizListWindow
- global gQuizListWindow, PackageType, TESTquizSPLIT
- vWidth = 240
- vHeight = 280
- tell the stage
- vPosH = the stageLeft + 440
- end tell
- tell the stage
- vPosV = the stageTop + 180
- end tell
- gQuizListWindow = window("Quiz List")
- if TESTquizSPLIT = "TEST" then
- window("Quiz List").title = "Test List"
- else
- window("Quiz List").title = "Quiz List"
- end if
- gQuizListWindow.fileName = the pathname & "cont-quizlister"
- gQuizListWindow.windowType = 16
- gQuizListWindow.rect = rect(vPosH, vPosV, vPosH + vWidth, vPosV + vHeight)
- open(gQuizListWindow)
- end
-